arrange <- function(x, y, z, d) {
    x + 1 + 1
    z
}

z <- 10
arrange(z, 2, 1, 1)